﻿Option Explicit On
Option Strict On

Namespace Framework.Hardware

    ''' <summary>
    ''' 
    ''' </summary>
    ''' <remarks></remarks>
    Public Class BandFrequencyEventArgs
        Inherits EventArgs

#Region " Private Members "

        Private m_Segment As BandSegment
        Private m_AntennaNumber As Integer
        Private m_USRMode As Boolean
        Private m_Band As FrequencyBand

#End Region

#Region " Constructor "

        ''' <summary>
        ''' Constructor
        ''' </summary>
        ''' <param name="Segment"></param>
        ''' <param name="AntennaNumber"></param>
        ''' <param name="USRMode"></param>
        ''' <param name="Band"></param>
        ''' <remarks></remarks>
        Public Sub New(ByVal Segment As BandSegment, ByVal AntennaNumber As Integer, ByVal USRMode As Boolean, ByVal Band As FrequencyBand)
            m_Segment = Segment
            m_AntennaNumber = AntennaNumber
            m_USRMode = USRMode
            m_Band = Band
        End Sub

#End Region

#Region " Public Properties "

        Public Property Segment As BandSegment
            Get
                Return m_Segment
            End Get
            Set(ByVal value As BandSegment)
                m_Segment = value
            End Set
        End Property

        Public Property AntennaNumber As Integer
            Get
                Return m_AntennaNumber
            End Get
            Set(ByVal value As Integer)
                m_AntennaNumber = value
            End Set
        End Property

        Public Property USRMode As Boolean
            Get
                Return m_USRMode
            End Get
            Set(ByVal value As Boolean)
                m_USRMode = value
            End Set
        End Property

        Public Property Band As FrequencyBand
            Get
                Return m_Band
            End Get
            Set(ByVal value As FrequencyBand)
                m_Band = value
            End Set
        End Property

#End Region

    End Class

End Namespace